home *** CD-ROM | disk | FTP | other *** search
/ You're the Director / You're The Director.iso / pc / macf / mger.dir / 00314_tabletiles Prev.ls < prev    next >
Encoding:
Text File  |  1995-10-10  |  638 b   |  38 lines
  1. on mouseDown
  2.   global prev, LastButton
  3.   if the clickOn < 21 then
  4.     exit
  5.   end if
  6.   if the controlDown then
  7.     exit
  8.   end if
  9.   set yu to the clickOn - 20
  10.   initsel()
  11.   setAt(selected, yu, 1)
  12.   setbar()
  13.   set LastButton to 2
  14.   if the doubleClick then
  15.     repeat with x = 21 to 44
  16.       if (yu + 20) = x then
  17.         set prev to 1
  18.         playmovn3Q()
  19.         puppetSound("OPEN.AIF")
  20.         set LastButton to 0
  21.         updateStage()
  22.         exit
  23.       end if
  24.     end repeat
  25.   end if
  26. end
  27.  
  28. on mouseUp
  29.   if the clickOn < 21 then
  30.     exit
  31.   end if
  32.   if the controlDown then
  33.     playmovn()
  34.   else
  35.     set yu to the clickOn - 20
  36.   end if
  37. end
  38.